home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / program / 519 / gem_vars.s < prev    next >
Encoding:
Text File  |  1991-02-24  |  6.0 KB  |  228 lines
  1. ;************************************************************************
  2. ;* Σ-soft-AES-Symboltabelle                        *
  3. ;* ©1989 by Σ-soft, written by Markus Fritze           11.08.1988 13:13 *
  4. ;************************************************************************
  5. ;EQU's mit Konstanten sind auch als Vorwärtsreferenzen möglich, da diese Symbole
  6. ;ihren Wert bereits bei der Eingabe erhalten:
  7.  
  8. appl_init:    EQU $0A000100
  9. appl_read:    EQU $0B020101
  10. appl_write:    EQU $0C020101
  11. appl_find:    EQU $0D000101
  12. appl_tplay:    EQU $0E020101
  13. appl_trecord:    EQU $0F010101
  14. appl_bvset:    EQU $10020100    ;ab GEM 2.0
  15. appl_yield:    EQU $11000100    ;ab GEM 2.0
  16. appl_exit:    EQU $13000100
  17.  
  18. evnt_keybd:    EQU $14000100
  19. evnt_button:    EQU $15030500
  20. evnt_mouse:    EQU $16050500
  21. evnt_mesag:    EQU $17000101
  22. evnt_timer:    EQU $18020100
  23. evnt_multi:    EQU $19100701
  24. evnt_dclick:    EQU $1A020100
  25.  
  26. menu_bar:    EQU $1E010101
  27. menu_icheck:    EQU $1F020101
  28. menu_ienable:    EQU $20020101
  29. menu_tnormal:    EQU $21020101
  30. menu_text:    EQU $22010102
  31. menu_register:    EQU $23010101
  32. menu_unregister:EQU $24010100    ;ab GEM 2.0
  33.  
  34. objc_add:    EQU $28020101
  35. objc_delete:    EQU $29010101
  36. objc_draw:    EQU $2A060101
  37. objc_find:    EQU $2B040101
  38. objc_offset:    EQU $2C010301
  39. objc_order:    EQU $2D020101
  40. objc_edit:    EQU $2E040201
  41. objc_change:    EQU $2F080101
  42.  
  43. form_do:    EQU $32010101
  44. form_dial:    EQU $33090100
  45. form_alert:    EQU $34010101
  46. form_error:    EQU $35010100
  47. form_center:    EQU $36000501
  48. form_keybd:    EQU $37030301
  49. form_button:    EQU $38020201
  50.  
  51. graf_rubberbox: EQU $46040300
  52. graf_dragbox:    EQU $47080300
  53. graf_movebox:    EQU $48060100
  54. graf_growbox:    EQU $49080100
  55. graf_shrinkbox: EQU $4A080100
  56. graf_watchbox:    EQU $4B040101
  57. graf_slidebox:    EQU $4C030101
  58. graf_handle:    EQU $4D000500
  59. graf_mouse:    EQU $4E010101
  60. graf_mkstate:    EQU $4F000500
  61.  
  62. srcp_read:    EQU $50000101
  63. srcp_write:    EQU $51000101
  64. scrp_clear:    EQU $52000100    ;ab GEM 2.0
  65.  
  66. fsel_input:    EQU $5A000202
  67. fsel_exinput:    EQU $5B000203    ;ab TOS 1.4
  68.  
  69. wind_create:    EQU $64050100
  70. wind_open:    EQU $65050100
  71. wind_close:    EQU $66010100
  72. wind_delete:    EQU $67010100
  73. wind_get:    EQU $68020500
  74. wind_set:    EQU $69060100
  75. wind_find:    EQU $6A020100
  76. wind_update:    EQU $6B010100
  77. wind_calc:    EQU $6C060500
  78. wind_new:    EQU $6D000000    ;ab TOS 1.4
  79.  
  80. rsrc_load:    EQU $6E000101
  81. rsrc_free:    EQU $6F000100
  82. rsrc_gaddr:    EQU $70020100    ;* (siehe Unterprogramm "aes")
  83. rsrc_saddr:    EQU $71020101
  84. rsrc_obfix:    EQU $72010101
  85.  
  86. shel_read:    EQU $78000102
  87. shel_write:    EQU $79030102
  88. shel_get:    EQU $7A010101
  89. shel_put:    EQU $7B010101
  90. shel_find:    EQU $7C000101
  91. shel_envrn:    EQU $7D000102
  92. shel_rdef:    EQU $7E000102    ;ab GEM 2.0
  93. shel_wdef:    EQU $7F000002    ;ab GEM 2.0
  94.  
  95. xgrf_stepcalc:    EQU $82060600    ;ab GEM 2.0
  96. xgrf_2box:    EQU $83090100    ;ab GEM 2.0
  97.  
  98. ; Die Messages des AES
  99. MN_SELECTED:    EQU 10        ;Menüeintrag angewählt
  100. WM_REDRAW:    EQU 20        ;Teil eines Windows muß neu gezeichnet werden
  101. WM_TOPPED:    EQU 21        ;Window ist nun das aktuelle Fenster
  102. WM_CLOSED:    EQU 22        ;Window soll geschlossen werden
  103. WM_FULLED:    EQU 23        ;Window soll auf max.Größe gebracht werden
  104. WM_ARROWED:    EQU 24        ;Scollbalken angeklickt
  105. WM_HSLID:    EQU 25        ;Der horizontale Slider wurde bewegt
  106. WM_VSLID:    EQU 26        ;Der vertikale Slider wurde bewegt
  107. WM_SIZED:    EQU 27        ;Die Größe des Windows wurde geändert
  108. WM_MOVED:    EQU 28        ;Das Window wurde bewegt
  109. WM_NEWTOP:    EQU 29        ;Das Fenster wurde aktiviert (siehe WM_TOPPED)
  110. WM_UNTOPPED:    EQU 30        ;Der Fenster wird gleich inaktiv (erst ab GEM 2.0!)
  111. AC_OPEN:    EQU 40        ;Ein Acc wurde angeklickt.(30 bzw. 31 ist FALSCH!)
  112. AC_CLOSE:    EQU 41        ;Prg wurde beendet, ACC soll seinen Speicher freigeben.
  113. CT_UPDATE:    EQU 50
  114. CT_MOVE:    EQU 51        ;Funktion unbekannt
  115. CT_NEWTOP:    EQU 52
  116.  
  117. ; WM_ARROWED angeklickt (nun die genauere Definition)
  118. WA_UPPAGE:    EQU 0        ;Balken oberhalb des Sliders
  119. WA_DNPAGE:    EQU 1        ;Balken unterhalb des Sliders
  120. WA_UPLINE:    EQU 2        ;Pfeil nach oben
  121. WA_DNLINE:    EQU 3        ;Pfeil nach unten
  122. WA_LFPAGE:    EQU 4        ;Balken links vom Slider
  123. WA_RTPAGE:    EQU 5        ;Balken rechts vom Slider
  124. WA_LFLINE:    EQU 6        ;Pfeil nach links
  125. WA_RTLINE:    EQU 7        ;und Pfeil nach rechts
  126.  
  127. ; Die Objekttypen des Resource-Baumes
  128. G_BOX:        EQU 20
  129. G_TEXT:     EQU 21
  130. G_BOXTEXT:    EQU 22
  131. G_IMAGE:    EQU 23
  132. G_PROGDEF:    EQU 24
  133. G_IBOX:     EQU 25        ;Bitte in entsprechender Literatur nachschlagen
  134. G_BUTTON:    EQU 26
  135. G_BOXCHAR:    EQU 27
  136. G_STRING:    EQU 28
  137. G_FTEXT:    EQU 29
  138. G_FBOXTEXT:    EQU 30
  139. G_ICON:     EQU 31
  140. G_TITLE:    EQU 32
  141.  
  142. ; Object-Flags bei einem Objekt
  143. NONE:        EQU 0
  144. SELECTABLE:    EQU 1
  145. DEFAULT:    EQU 2
  146. EXIT:        EQU 4
  147. EDITABLE:    EQU 8
  148. RBUTTON:    EQU $10     ;Bitte ebenfalls in der Literatur nachlesen
  149. LASTOB:     EQU $20
  150. TOUCHEXIT:    EQU $40
  151. HIDETREE:    EQU $80
  152. INDIRECT:    EQU $0100
  153.  
  154. ; Objekt-Status bei einem Objekt
  155. NORMAL:     EQU 0
  156. SELECTED:    EQU 1
  157. CROSSED:    EQU 2
  158. CHECKED:    EQU 4        ;s.o.
  159. DISABLED:    EQU 8
  160. OUTLINED:    EQU $10
  161. SHADOWED:    EQU $20
  162.  
  163. ; Die einzelnen Bits bei evnt_multi()
  164. MU_KEYBD:    EQU 1        ;Tastaturereignis
  165. MU_BUTTON:    EQU 2        ;Maustastenereignis
  166. MU_M1:        EQU 4        ;1.Mausereignis
  167. MU_M2:        EQU 8        ;2.Mausereignis
  168. MU_MESAG:    EQU 16        ;Message des AES
  169. MU_TIMER:    EQU 32        ;Timer-Ereignis
  170.  
  171. ; form_dial()
  172. FMD_START:    EQU 0        ;Bildschirmhintergrund reservieren
  173. FMD_GROW:    EQU 1        ;Ausdehnende Box zeichnen
  174. FMD_SHRINK:    EQU 2        ;Schrumpfende Box zeichnen
  175. FMD_FINISH:    EQU 3        ;Bildschirmbereich wieder freigeben
  176.  
  177. ; graf_mouse()
  178. ARROW:        EQU 0
  179. TEXT_CRSR:    EQU 1
  180. HOURGLASS:    EQU 2
  181. BUSYBEE:    EQU 2
  182. POINT_HAND:    EQU 3
  183. FLAT_HAND:    EQU 4
  184. THIN_CROSS:    EQU 5
  185. THICK_CROSS:    EQU 6
  186. OUTL_CROSS:    EQU 7
  187. USER_DEF:    EQU 255
  188. M_OFF:        EQU 256
  189. M_ON:        EQU 257
  190.  
  191. ; Parameter bei wind_create()
  192. WI_NAME:    EQU 1
  193. WI_CLOSE:    EQU 2
  194. WI_FULL:    EQU 4
  195. WI_MOVE:    EQU 8
  196. WI_INFO:    EQU $10
  197. WI_SIZE:    EQU $20
  198. WI_UPARROW:    EQU $40
  199. WI_DNARROW:    EQU $80
  200. WI_VSLIDE:    EQU $0100
  201. WI_LFARROW:    EQU $0200
  202. WI_RARROW:    EQU $0400
  203. WI_HSLIDE:    EQU $0800
  204.  
  205. ; Parameter bei wind_get() & wind_set()
  206. WF_KIND:    EQU 1
  207. WF_NAME:    EQU 2
  208. WF_INFO:    EQU 3
  209. WF_WORKXYWH:    EQU 4
  210. WF_CURRXYWH:    EQU 5
  211. WF_PREVXYWH:    EQU 6
  212. WF_FULLXYWH:    EQU 7
  213. WF_HSLIDE:    EQU 8
  214. WF_VSLIDE:    EQU 9
  215. WF_TOP:     EQU 10
  216. WF_FIRSTXYWH:    EQU 11
  217. WF_NEXTXYWH:    EQU 12
  218. WF_NEWDESK:    EQU 14
  219. WF_HSLSIZE:    EQU 15
  220. WF_VSLSIZE:    EQU 16
  221.  
  222. ; wind_update()
  223. END_UPDATE:    EQU 0
  224. BEG_UPDATE:    EQU 1
  225. END_MCTRL:    EQU 2
  226. BEG_MCTRL:    EQU 3
  227.         END
  228.